with strings; use strings;
package Spectateur is
   procedure demarrer (N : individu; attente : duration);
end Spectateur;
